home *** CD-ROM | disk | FTP | other *** search
/ 8bitfiles.net/archives / archives.tar / archives / commodore-scene-files / Geos / GEOS128 / GeosD81 / CS75.D81 / e-z read me (.txt) < prev    next >
Encoding:
Commodore BASIC  |  2019-04-13  |  2.8 KB  |  44 lines
  1. 1 DIMF$(18),B$(250),D$(170):POKE53280,0:POKE53281,0:PRINTCHR$(14)"[147]   [195]-64/[195]-128  [197]-[218] [211]EQ. READER [214]4.4":PRINT"[154] ([195]) [195]OPYRIGHT 1986 BY [211]TEVE [196]. [206]ICHOLS ";:PRINT" [198]REE COPIES ONLY ..................... [146]":DE$="
  2. 2 [153]"OPEN ASCEATURES AUTOMATIC MODE ADJUSTMENT.":[153]"MID$UST TURN ON YOUR COMPUTER IN THE MODE  YOU WISH TO OPERATE IN....":[153]"SYS LEN-64 LENOMPUTER.":[153]" LEN-128 IN 64 MODE.":[153]" LEN-128 40/LENOL. MODE.":[153]" LEN-128 80/LENOL. MODE.
  3. 3 PRINT"[159][212]HEN LOAD AND RUN THIS PROGRAM. [201]T WILL AUTOMATICALLY ADJUST ITSELF TO RUN IN   ANY OF THE 4 MODES ABOVE.":IFPEEK(45)<>1THENFORA=828TO974:READB%:POKEA,B%:NEXT:GOTO6
  4. 4 IFPEEK(215)=128THEN(null)%
  5. 5 FORA=2816TO2962:READB%:POKEA,B%:NEXT:POKE2886,72:POKE2887,11:POKE2899,112:POKE2900,11
  6. 6 FORA=1TO170:T$=STR$(A):D$(A)=RIGHT$(T$,LEN(T$)-1):NEXT:PRINT"[153] [208]UT DISK WITH SEQ. FILES IN DRIVE,":PRINT" AND PRESS  [210][197][212][213][210][206] [146]....[159]":PRINT" PRESS 'STOP' TO QUIT.
  7. 7 [161]Z$:[139]Z$[179][177][199](13)[175]Z$[179][177]"Q"[167]7
  8. 8 [139]Z$[178]"Q"[167][128]
  9. 9 A%[178]1:[153]"LISTLOADING FILENAMES...OPEN":C$[178][199](34):[159]1,8,0,"$":[129]N[178]1[164]28:[161]#1,W$:N$[178]N$[170]W$:[130]:[161]#1,W$,W$,W$,W$
  10. 10 [139]ST[167]16
  11. 11 [161]#1,W$:[139]W$[179][177]C$[167]10
  12. 12 [161]#1,X$,F$(1),F$(2),F$(3),F$(4),F$(5),F$(6),F$(7),F$(8),F$(9),F$(10),F$(11),F$(12),F$(13),F$(14),F$(15),F$(16),F$(17),W$:X%[178]1:[139]W$[179][177]"S"[167]15
  13. 13 [139]F$(X%)[179][177]C$[167]X$[178]X$[170]F$(X%):X%[178]X%[170]1:[137]13
  14. 14 B$(A%)[178]X$:[139]W$[178]"S"[167]A%[178]A%[170]1:[153]" SEQ. FILE ---> OPEN";X$
  15. 15 [161]#1,W$,W$,W$,W$,W$,W$,W$,W$,W$,W$,W$:[137]10
  16. 16 [160]1:[139]A%[179]2[167][153]"LOAD  (null)O SEQUENTIAL FILES ON THIS DISK!!!":[129]N[178]1[164]5000:[130]:[138]
  17. 17 [139][194](45)[178]1[175][194](215)[178]128[167]G%[178]3:PG%[178]1:N%[178]1:M%[178]83:[137]22
  18. 18 PG%[178]1:G%[178]1:N%[178]1:M%[178]42:[137]22
  19. 19 M%[178]83:[137]22
  20. 20 M%[178]125:[137]22
  21. 21 M%[178]167
  22. 22 [153][199](14)"LOAD LIST  MENU  WAITPRINT";N$"WAIT PAGE"PG%:[153]"OPEN   PRESS RETURN FOR NEXT PAGE.":[139][194](215)[179][177]128[167]25
  23. 23 [153]"LIST"D$(N%)"WAIT"B$(N%)[163]19)"LIST"D$(N%[170]1)"WAIT"B$(N%[170]1)[163]38)"LIST"D$(N%[170]2)"WAIT"B$(N%[170]2)[163]57)"LIST"D$(N%[170]3)"WAIT"B$(N%[170]3):N%[178]N%[170]4:[139]N%[179]A%[175]N%[179][178]M%[167]23
  24. 24 [137]26
  25. 25 [153]"LIST"D$(N%)"WAIT"B$(N%)[163]19)"LIST"D$(N%[170]1)"WAIT"B$(N%[170]1):N%[178]N%[170]2:[139]N%[179]A%[175]N%[179][178]M%[167]25
  26. 26 P$[178]"":[133]"OPEN   PRINT SEQ. FILE NUMBER -->WAIT ";P$:P%[178][197](P$):[139]P$[179][177]""[167]30
  27. 27 [139]N%[177][178]A%[167]17
  28. 28 [139]N%[177]42[175]N%[179][178]A%[167]G%[178]G%[170]1:PG%[178]PG%[170]1
  29. 29 [145]G%[137]17,19,20,21
  30. 30 [139]P%[179]1[176]P%[177][178]A%[176]P[177][178]M%[167]17
  31. 31 DN[178]3:SA[178]0:[153]"LOADSYS ASCILENAME... "B$(P%):[133]"<S>CREEN, <P>RINTER OR <A>NOTHER DISK   ---->    SCMDCMDCMD";IN$:[139][200](IN$,1)[179][177]"S"[167]33
  32. 32 [137]34
  33. 33 DN[178]4:SA[178]7:[153]:[139][200](IN$,1)[178]"A"[167][138]
  34. 34 [151]254,DN:[153]:[159]4,DN,SA:[159]3,8,5,B$(P%):[153]"SYSPRESS ANY KEY TO PAUSE...
  35. 35 IFPEEK(45)=1THENSYS2816:GOTO37
  36. 36 SYS828
  37. 37 IFPEEK(253)=0ANDPEEK(252)=67THENPRINTDE$;:GOTO35
  38. 38 IFPEEK(252)=77THEN41
  39. 39 PRINT:PRINT"  [159] PRESS ANY KEY [146]
  40. 40 [161]A$:[139]A$[178]""[167]40
  41. 41 [152]4:[160]4:[160]3:[151]252,0:[137]17:[131]160,8,132,251,32,204,255,162,3,32,198,255,164,254,192,3,240,8,32,204,255,162,3,32,198,255,32,228,255,201,34,208,2,169,39,72,32,183,255,133,253,166,254,224,3,240,8,32,204,255,162,4,32,201,255,104,32,210,255,165,253,208,45
  42. 42 [131]198,251,164,251,208,199,76,132,3,32,204,255,32,228,255,240,176,160,0,185,172,3,240,6,32,210,255,200,208,245,32,228,255,240,251,133,252,201,77,240,4,201,67,208,241,32,204,255,96,159,18,32,208,65,85,83,69,58,32,32,60,205,62,69,78,85,44,32,60,195
  43. 43 [131]62,79,78,84,73,78,85,69,46,32,5,146,0,0
  44.